home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 36 / Amiga Format CD36 (1999-01-22)(Future Publishing)(GB)[!][issue 1999-02].iso / -seriously_amiga- / sound / 303tracker / program / rexx / www_home.rexx < prev    next >
OS/2 REXX Batch file  |  1998-11-30  |  992b  |  44 lines
  1. /* --------------------------------------------------------------- */
  2. /* WWW_home.rexx by Jeroen Schellekens                             */
  3. /* Links to the 303tracker homepage when a browser is running      */
  4. /* --------------------------------------------------------------- */
  5.  
  6. OPTIONS RESULTS
  7. PARSE ARG
  8.  
  9. home="http://www.xs4all.nl/~jes303"
  10.  
  11. IF SHOW('P','IBROWSE') THEN
  12.     DO
  13.         ADDRESS 303TRACKER_REXX
  14.         303_TO_BACK
  15.         ADDRESS IBROWSE 'NewWindow "'home'"'
  16.     END
  17.  
  18. ELSE
  19.  
  20. IF SHOW('P','VOYAGER') THEN
  21.     DO
  22.         ADDRESS 303TRACKER_REXX
  23.         303_TO_BACK
  24.         ADDRESS VOYAGER 'OpenURL "'home'" NEWWIN'
  25.     END
  26.  
  27. ELSE
  28.  
  29. IF SHOW('P','AWEB.1') THEN
  30.     DO
  31.         ADDRESS 303TRACKER_REXX
  32.         303_TO_BACK
  33.         ADDRESS AWEB.1  'Open "'home'"'
  34.     END
  35.  
  36. ELSE
  37.     DO
  38.         ADDRESS COMMAND 'wait 1'
  39.         ADDRESS 303TRACKER_REXX
  40.         303_TO_FRONT
  41.         303_REQ_NOTIFY '"Open URL (WWW Link) Failed!"' '"Cannot locate any browser-program!"' '"Sorry"'
  42.         303_REQ_NOTIFY '"How To Solve This Problem..."' '"Try to start your Internet-browser first."' '"Okay"'
  43.     END
  44.